Validating Fields
Now we will write the code for validating each field of the screen 200.
Module check_name.
Perform validate_name.
endmodule.
Form validate_name.
If not ztryemp-name co c_alphabet.
Message e999(z1) with text-005.
Endif.
Endform.
Module check_phone.
Perform validate_phone.
endmodule.
Form validate_phone.
If not ztryemp-phone co c_digits.
Message e999(z1) with text-006.
Endform.
Module check_basic.
Perform validate_basic.
endmodule.
Form validate_basic.
If ztrytxn-basic le c_0.
Message e999(z1) with text-007.
Endif.
Endform.
As we use various variables and constants in our code, double click them to create their declarations in the top include of the transaction, i.e MZTRYTOP. Finally this top include will look something like.
Variable Declarations
As we use various variables and constants in our code, double click them to create their declarations in the top include of the transaction, i.e MZTRYTOP. Finally this top include will look something like this.
MZTRYTOP
Tables : ztryemp,
Ztrydept,
Ztryrate,
Ztrytxn.
Data :
t_ztryemp like ztryemp,
t_ztrydept like ztrydept,
t_ztryrate like ztryrate,
t_ztrytxn like ztrytxn.
Constants :
c_x(1) type c value �X�,
c_0(1) type c value �0�,
c_save(4) type c value �SAVE�,
c_exit(4) type c value �EXIT�,
c_modify(4) type c value �MODI�,
c_delete(4) type c value �DELE�,
c_back(4) type c value �BACK�,
c_cancel(4) type c value �CANC�,
c_digits(10) type c value �0123456789�,
c_alphabet(28) type c value � ABCDEFGHIJKLMNOPQRSTUVWXYZ�.
Data :
v_date like sy-datum,
V_emp_exist(1) type c,
V_empno like ztryemp-empno.
|
